ON ERROR RESUME NEXT

strComputer = "."
strGroup1 = "Team"


Set objGroup = GetObject("WinNT://" & strComputer & "/Administrators")
Set objUser1 = GetObject("WinNT://contoso/" & strGroup1)
WScript.Echo "Adding " & strGroup1 & " to Local Administrators"
objGroup.Add(objUser1.ADsPath)
